Thema Datum  Von Nutzer Rating
Antwort
Rot Excel VBA | Nach mehreren Kriterien filtern
 01.02.2021 11:01:09 Dennis
NotSolved
01.02.2021 12:28:49 Werner
NotSolved
01.02.2021 13:03:31 Dennis
NotSolved

Ansicht des Beitrags:
Von:
Dennis		 Datum:
01.02.2021 11:01:09		 Views:
757		 Rating:
     
Antwort:
  Ja
Thema:
Excel VBA | Nach mehreren Kriterien filtern

Hallo zusammen,

kann mir jemand bei meinem Problem helfen?

Ich habe hier einen Button erstellt, der mir von einem Tabellenblatt die Daten filtert und neu auf einem Tabellenblatt ausgibt. Jedoch kann ich hier nur ein Tabellenblatt sowie  nach einer Kriterie filtern. Gibt es hier eine Möglichkeit mehrere Tabellenblätter und mehrere Kriterien zu filtern? Ich arbeite mit der Excel Version 2016 und würde gerne nach 3 Kriterien Filtern ("Offen", "Erstellt", "Öffentlich") und würde jeweils noch 5 Tabellenblätter aktivieren bei denen die Kriterien auch gefiltert werden (Namen der Tabellen: "Tabelle2", Tabelle5","Tabelle6").

Die Tabellen haben hier alle die gleichen Maße, das heißt, sie fangen alle von A11 an und enden bei AH200.

 

Sub Schaltfläche5_Klicken()
'Das Tabelenbaltt aktivieren
ThisWorkbook.Worksheets("Tabelle3").Activate

'FilterEinstellungen auf Null setzen
ActiveSheet.Range("A11:AH200").AutoFilter

'Filter wählen - Kategorie "Auswertung"
ActiveSheet.Range("A11:AH200").AutoFilter 12, "Offen"


'Informationen in ein anderes Tabellenbaltt kopieren

   'Tabelle leeren
   ThisWorkbook.Worksheets("Auswertung").Cells.Clear
   
   'Information kopieren
   ActiveSheet.Range("A11:AH200").Copy Destination:=ThisWorkbook.Worksheets("Auswertung").Range("A4")
End Sub

Würde mich über jede Hilfe freuen.

Gruß

Dennis

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Excel VBA | Nach mehreren Kriterien filtern
 01.02.2021 11:01:09 Dennis
NotSolved
01.02.2021 12:28:49 Werner
NotSolved
01.02.2021 13:03:31 Dennis
NotSolved